home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / mac / developm / language / harvest.cpt / Harvest C / Tcl 6.2 / XTCL.h < prev   
Encoding:
C/C++ Source or Header  |  1992-02-10  |  855 b   |  32 lines
  1.  
  2. #ifndef __DIALOGS__
  3. #include <Dialogs.h>
  4. #endif
  5.  
  6.  
  7. #define ucNoErr                0
  8. #define ucCancelErr            -1
  9. #define ucNoAddrErr            1001
  10.  
  11. #define XTCL_CB_VERSION        0x00010001
  12.  
  13. /*
  14. ** This is the interface for text selection resource commands.
  15. */
  16. typedef struct {
  17.     long        version;            /* Version of the Cmd interface. */
  18.     long        result;                /* CMD's operation result code. */
  19.     Handle        resultH;            /* CMD's result handle. */
  20.     short        cmdRefNum;            /* Cmd file reference number. */
  21.     Handle        cmdHandle;            /* CMD's command code handle. */
  22.     Tcl_Interp    *interp;            /* Interpreter calling this XTCL. */
  23.     int            (*eval)();            /* Callback procedure (C) for tcl script evaluation */
  24.     ModalFilterProcPtr    modalproc;    /* Routine for ModalDialog() to keep background. */
  25.     long        reserved;
  26.     } XTCLParmBlk, *XTCLPBPtr;
  27.  
  28. #define XTCL_FAILURE            0
  29. #define XTCL_SUCCESS            1
  30. #define XTCL_REQ_UNKNOWN        -1
  31.  
  32.